Allow which-key-special-keys to be nil
authorjustbur <justin@burkett.cc>
Fri, 24 Jul 2015 13:52:41 +0000 (09:52 -0400)
committerjustbur <justin@burkett.cc>
Fri, 24 Jul 2015 13:52:41 +0000 (09:52 -0400)
which-key.el

index 1f3966ba282e0e345d4ad2e28c2ff9b706739ac1..2d49e62f13d86db4f6f2c254775b662d0b7c1c08 100644 (file)
@@ -720,7 +720,8 @@ If KEY contains any \"special keys\" defined in
                         (mapconcat 'identity which-key-special-keys
                                    "\\|") "\\)")))
     (save-match-data
-      (if (string-match regexp key)
+      (if (and which-key-special-keys
+               (string-match regexp key))
           (let ((beg (match-beginning 0)) (end (match-end 0)))
             (concat (substring key-w-face 0 beg)
                     (propertize (substring key-w-face beg (1+ beg))